home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 2000 #5
/
Amiga Plus CD - 2000 - No. 5.iso
/
Tools
/
Misc
/
FLM
/
otherfiles
/
deutsch
/
ARexx
/
look.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
2000-01-01
|
1KB
|
30 lines
/* Dieser Script schickt ein Wort an FLM,
worauf FLM das FLM-ARexx-Fenster öffnet */
/* Hier bitte den Pfad und Programmnamen von FLM einstellen*/
initiation=run "dh0:FLM/FLM"
Options RESULTS /*Damit auch eine Rückgabe erfolgen kann*/
IF ~show('P','FLM') THEN DO
/*falls FLM noch nicht gestartet ist*/
ADDRESS COMMAND initiation
/* Warten bis FLM gestartet wurde ...*/
ADDRESS COMMAND "SYS:RexxC/WaitForPort FLM"
END
RESULT='go'
/*Hier wird das Wort go in die Variable RESULT geschrieben. Diese Zeile
müssen Sie ändern, damit z.B. das Wort unter dem Cursor an FLM geschickt
werden kann. Wenn z.B. der ARexx-Befehl Ihres Text-Programmes "GetWord"
heißt, so müßte hier "Address <adr> GetWord" stehen. Für <adr> müssen Sie
die ARexx-Adresse Ihres Programmes schreiben, welche sich in Ihren
Programm-Dokumentationen befindet.
Es ist normalerweise auch möglich 'Address' + 'Port-Adresse des
Programmes' wegzulassen. Dann müßten Sie z.B. nur "GetWort" schreiben.
*/
Address FLM LOOKWORD RESULT /* Schickt Wort, welches in Variable RESULT steht an FLM*/